home *** CD-ROM | disk | FTP | other *** search
/ Die Ultimative Software-P…i Collection 1996 & 1997 / Die Ultimative Software-Pakete CD-ROM fur Atari Collection 1996 & 1997.iso / g / gnu_c / pmllib21.zoo / pow.s < prev    next >
Encoding:
Text File  |  1993-08-12  |  728 b   |  62 lines
  1. #NO_APP
  2. gcc2_compiled.:
  3. ___gnu_compiled_c:
  4. .text
  5.     .even
  6. .globl _pow
  7. _pow:
  8.     fmovem #0x4,sp@-
  9.     fmoved sp@(16),fp2
  10.     fmoved sp@(24),fp1
  11.     fmovecr #0xf,fp0
  12.     fcmpx fp0,fp1
  13.     fjne L74
  14.     fcmpx fp0,fp2
  15.     fjeq L76
  16.     fmovecr #0x32,fp0
  17.     jra L88
  18. L74:
  19.     fcmpx fp0,fp2
  20.     fjne L77
  21.     fcmpx fp0,fp1
  22.     fjngt L76
  23.     jra L88
  24. L77:
  25.     fcmpx fp0,fp2
  26.     fjnlt L81
  27.     fintrzx fp1,fp0
  28.     fmovel fp0,d0
  29.     fmovel d0,fp0
  30.     fcmpx fp1,fp0
  31.     fjne L76
  32.     fnegx fp2,fp0
  33. #APP
  34.     flognx fp0,fp0
  35. #NO_APP
  36.     fmulx fp1,fp0
  37. #APP
  38.     fetoxx fp0,fp0
  39. #NO_APP
  40.     btst #0,d0
  41.     jeq L88
  42.     fnegx fp0,fp0
  43.     jra L88
  44. L81:
  45. #APP
  46.     flognx fp2,fp0
  47. #NO_APP
  48.     fmulx fp1,fp0
  49. #APP
  50.     fetoxx fp0,fp0
  51. #NO_APP
  52.     jra L88
  53. L76:
  54.     movew #89,_errno
  55. #APP
  56.     fmoved #0x7ff0000000000000,fp0
  57. #NO_APP
  58. L88:
  59.     fmovem sp@+,#0x20
  60.     rts
  61. .comm _errno,2
  62.